Excel文件加密后忘记密码破解方法 | 您所在的位置:网站首页 › excle 密码破解 › Excel文件加密后忘记密码破解方法 |
最好使用VBA 工程密码破解方法
新建一个excel文档,然后打开,同时按Alt和F11,进入VBA界面 点击菜单上的插入,模块 在新的窗口粘贴以下代码: 1 Sub crack() 2 3 Dim i As Long 4 5 Dim FileName As String 6 7 i = 0 8 9 FileName = Application.GetOpenFilename("Excel文件(*.xls & *.xlsx),*.xls;*.xlsx", , "VBA破解") 10 11 FileName = Right(FileName, Len(FileName) - InStrRev(FileName, "\")) 12 13 Application.ScreenUpdating = False 14 15 line2: On Error GoTo line1 16 17 Workbooks.Open FileName, , True, , i 18 19 MsgBox "Password is " & i 20 21 Exit Sub 22 23 line1: i = i + 1 24 25 Resume line2 26 27 Application.ScreenUpdating = True 28 29 End Sub点击运行 在弹出的对话框中选择需要破解的Excel文件,点击打开 等待破解即可 |
CopyRight 2018-2019 实验室设备网 版权所有 |